home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1996 #5 / Amiga Plus CD - 1996 - No. 5.iso / pd / tools / amisearch / installation-english < prev    next >
Text File  |  1996-05-26  |  2KB  |  65 lines
  1. ;$VER:AmiSearch installation script
  2.  
  3. (complete 0)
  4. (set @default-dest "Work:")
  5.  
  6. ; Texts
  7.  
  8. (set #Warning-Txt
  9. (cat "Warning !\n\n\n"
  10. "AmiSearch needs MUI 3.3+ to work.\n\n"
  11. "Without MUI AmiSearch won't work...\n\n"
  12. ))(set #Path-Txt
  13. (cat "Please choose target directory."
  14. "An AmiSearch drawer will be created there."
  15. ))(set #Path-Help
  16. (cat "This part allows you to choose the directory where AmiSearch will be copied.\n\n"
  17. "An AmiSearch drawer is created there, in order to allow a better index handling.\n\n"
  18. "The default one is Work:\n\n\n"
  19. ))
  20.  
  21.  
  22. ; Main
  23.  
  24. (message #Warning-Txt)
  25. (set target
  26. (askdir (prompt #Path-Txt) (help #Path-Help) (default @default-dest) (newpath)
  27. ))
  28. (set @default-dest (tackon target "AmiSearch"))
  29. (makedir (tackon target "AmiSearch")(infos))
  30. (makedir (tackon target "AmiSearch/Docs") (infos))
  31. (makedir (tackon target "AmiSearch/Index") (infos))
  32. (copyfiles
  33. (prompt "Copying software")
  34. (help @copy-files-help)
  35. (source "AmiSearch")
  36. (dest (tackon target "AmiSearch"))
  37. (infos))
  38.  
  39. (complete 20)
  40. (copyfiles (prompt "Copying localisation") (source "Locale/AmiSearch.cd") (dest "LOCALE:"))
  41.  
  42. (complete 50)
  43. (copyfiles
  44. (prompt "Copying manual")
  45. (help @copy-files-help)
  46. (source "Docs/English_Manual.guide")
  47. (dest (tackon target "AmiSearch/Docs"))
  48. (infos))
  49.  
  50. (complete 75)
  51. (copyfiles
  52. (prompt "Copying environment")
  53. (help @copy-files-help)
  54. (source "ENVARC/AmiSearch.Paths")
  55. (dest "ENVARC:")
  56. )
  57. (copyfiles
  58. (prompt "Copying environment")
  59. (help @copy-files-help)
  60. (source "ENVARC/AmiSearch.Paths")
  61. (dest "ENV:")
  62. )
  63.  
  64. (complete 100)
  65.